"Fixed-width font for the captions in METAFONT proofmode output";
% Each character is 2.5pt wide times the magnification used in proofmode.
fontidentifier "CMTT"; ptsize=5;
input cmbase;
if mode=2: highres=1;
else: highres=0;
fi;
if highres>0: designsiz=10 round 7mag;	% printer pixels per MF pixel on Alphatype
	% Alphatype designsize should be a multiple of 10 and at least 40
else: designsiz=round 4mag;	% printer pixels per MF pixel on low-resolution devices
fi;
pixwd*pixels=designsiz;
magnification pixwd;
new pixels; pixels=designsiz;
hresolution pixels; vresolution pixels;

ph=110/36; px=80/36; pe=40/36; pd=40/36;
pb=15/36; po=2/36; ps=0/36; pas=17/36; pa=.5ph;
pw=pwi=pwii=12/36; pwiii=15/36;
pwiv=pwv=12/36; aspect=0.95; pdel=5/36; fudge=.8;
9pu=2.5; lcs=1.6; ucs=1.6; sc=0; ls=0;
slant=0; sqrttwo=sqrt 2; fixwidth=1; crisp=0;
phh=phhh=ph; pssd=0; pdd=.5pd; varg=0; lowast=1; ligs=0.
call fontbegin;
input roman;
end